home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 2 / Apprentice-Release2.iso / Source Code / C / Applications / UIFlow 1.0.1 / UIFlow Source / Kevin / endfortran.f < prev    next >
Encoding:
Text File  |  1991-12-19  |  74 b   |  4 lines  |  [TEXT/MPS ]
  1.       subroutine ENDFORT
  2.       Call DoMenu("File","Quit")
  3.       return
  4.       end